projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
8259bf1
)
(syntax-ppss-stats): Be more robust when dividing by 0.
author
Stefan Monnier
<monnier@iro.umontreal.ca>
Sun, 28 Oct 2001 05:43:36 +0000
(
05:43
+0000)
committer
Stefan Monnier
<monnier@iro.umontreal.ca>
Sun, 28 Oct 2001 05:43:36 +0000
(
05:43
+0000)
lisp/emacs-lisp/syntax.el
patch
|
blob
|
history
diff --git
a/lisp/emacs-lisp/syntax.el
b/lisp/emacs-lisp/syntax.el
index 0eef9671b4635e8c7c5ff04de97ab8f7127279d6..f00c8752dd483791c0bf50f668d121416a0f544d 100644
(file)
--- a/
lisp/emacs-lisp/syntax.el
+++ b/
lisp/emacs-lisp/syntax.el
@@
-92,7
+92,10
@@
point (where the PPSS is equivalent to nil).")
(defvar syntax-ppss-stats
[(0 . 0.0) (0 . 0.0) (0 . 0.0) (0 . 0.0) (0 . 0.0) (1 . 2500.0)])
(defun syntax-ppss-stats ()
- (mapcar (lambda (x) (cons (car x) (truncate (/ (cdr x) (car x)))))
+ (mapcar (lambda (x)
+ (condition-case nil
+ (cons (car x) (truncate (/ (cdr x) (car x))))
+ (error nil)))
syntax-ppss-stats))
;;;###autoload